home *** CD-ROM | disk | FTP | other *** search
/ Freelog 33 / Freelog033.iso / Bas / Internet / XandreScript / Xandre Script.ace / Xandre Script / Script / xs.alias < prev    next >
Encoding:
Text File  |  2001-04-24  |  35.8 KB  |  728 lines
  1. /op /mode # +oooooo $1-
  2. /do /mode # -oooooo $1-
  3. /vo /mode # +vvvvvv  $1-
  4. /dv /mode # -vvvvvv  $1-
  5. /ha /mode # +hhhhhh  $1-
  6. /dh /mode # -hhhhhh  $1-
  7. /nb_chan say J'ai joinds $xs.conf(Perso,Nb_de_chan_jointes) chan depuis que je possΦde ce script ( $+ $xs.name $+ )
  8. /defautmode if (nt !isin $1($1).mode) && ($me isop $chan) mode $1 +nt
  9. /getop /msg o requestop # $me | if ($1 != silence) /msg # PLEASE : All do /msg o requestop $chan $me / SVP : Faites tous et toutes /msg o requestop $chan $me
  10. /j /join #$$1 $2-
  11. /p /part #
  12. /bplay /run $mircdirscript\programmes\bplay.exe
  13. ;LECTEUR MULTIMEDIA
  14. /mp3.player xs.writeini Mp3 lastfile $$dir="Quel son jouer ?" $mp3.dir | run -np $mp3.file | /mp3.info | /if ($server != $null) && ($mp3.annonce == on) .ame 15,0pLaY <0,15>14,15<15,14>15,1 $nopath($mp3.file).mp3 15,14<14,15>0,15<15,0> with 8,1 $+ $xs.name by S4turn 
  15. /mp3.default_rep {
  16.   xs.writeini Mp3 defaultdir $$sdir(\,Choisissez le repertoire par defaut du lecteur multimΘdia)
  17.   /echo -a %char.inc %char.o2 Mp3 %char.f2 Le repertoire par dΘfaut est maintenant : $mp3.dir
  18. }
  19. /mp3.lastfile run -np $mp3.file | /mp3.info | /if ($server != $null) && ($mp3.annonce == on) .ame 15,0RepLaY <0,15>14,15<15,14>15,1 $nopath($mp3.file).mp3 15,14<14,15>0,15<15,0> with 8,1 $+ $xs.name by S4turn
  20. /mp3.info {
  21.   if ($right($mp3.file,4) == .mp3) {
  22.     set %jb.20 $replace($nopath($mp3.file),$chr(95),$chr(32))
  23.     if ( $right(%jb.20,4) == .mp3 ) { set %jb.20 $remove(%jb.20,.mp3) }
  24.     set %jb.21 $round($calc(($file($mp3.file).size)/1048576),1)
  25.     set %jb.23 $mp3($mp3.file).bitrate
  26.     set %jb.24 $calc(($mp3($mp3.file).sample)/1000)
  27.     set %jb.25 $mp3($mp3.file).mode
  28.     if ( %jb.25 == Joint Stereo ) { set %jb.25 Stereo }
  29.     if ( %jb.25 == Single Channel ) { set %jb.25 Mono }
  30.     set %jb.26 $int($calc($mp3($mp3.file).length / 1000))
  31.     set %jb.27 $int($calc($mp3($mp3.file).length / 60000))
  32.     set %jb.28 $calc(%jb.26 - (%jb.27 * 60))
  33.     if ( %jb.28 < 10 ) { set %jb.28 $chr(48) $+ %jb.28 }
  34.     set %jb.22 %jb.27 $+ : $+ %jb.28
  35.     /echo -a %char.inc2 %char.o2 MP3 %char.f2 Vous Θcoutez $chr(91) $+ 4 %jb.20  $+ $chr(93)  $+ á $chr(91) $+ 10 %jb.25  $+ $chr(93) $+ á $chr(91) $+ 10 %jb.23 Kbps $chr(93) $+ á $chr(91) $+ 10 %jb.24 Khz $chr(93) $+ á $chr(91) $+ 10 %jb.22 Min $chr(93) $+ á $chr(91) $+ 10 %jb.21 Mo $chr(93) $+ á $chr(91) Annonce :10 $mp3.annonce  $+ $chr(93)
  36.     unset %jb.*
  37.   }
  38. }
  39. /send /dcc send $1 $2
  40. /chat /dcc chat $1
  41. /ping /ctcp $$1 ping
  42. /f1 /newserver
  43. /sf1 /msg q chanlev #babylon $$1 +aomtv
  44. /f2 /demarrageduscript
  45. /f3 /load_d p.config
  46. /sf3 /gcconfig
  47. /f4 /msg q op $chan
  48. /sf4 /msg q voice $chan
  49. /f6 /saymsg
  50. /f7 /find
  51. /f5 {
  52.   ;STATISTIQUES
  53.   /echo $chan 4/----------=( Statistiques )=------- --- -- -
  54.   if ($chan != $null) {
  55.     if (%stats.topic != off) || (%stats.mode != off) || (%stats.pers.total != off) || (%stats.pers.op != off) || (%stats.pers.voice != off) || (%stats.pers.reg != off) /echo $chan 4|áááááááááá áááááááááááááá3***12 CHAN $chan 3***
  56.     if (%stats.topic != off) /echo $chan 4|10,0Topic :1,0 $chan($chan).topic
  57.     if (%stats.mode != off) /echo $chan 4|10,0Modes :1,0 $chan($chan).mode
  58.     if (%stats.pers.total != off) /echo $chan 4|10,0Personnes prΘsentes :1,0 $nick(#,0,a)
  59.     if (%stats.pers.op != off) /echo $chan 4|10,0Personnes opΘes :1,0 $nick(#,0,o)
  60.     if (%stats.pers.voice != off) /echo $chan 4|10,0Personnes voicΘes :1,0 $nick(#,0,v)
  61.     if (%stats.pers.reg != off) /echo $chan 4|10,0Personnes normales :1,0 $nick(#,0,r)
  62.     /echo $chan 4|
  63.   }
  64.   if (%stats.perso.nbquery != off) || (%stats.perso.nbdcc != off) /echo $chan 4|áááááááááá áááááááááááááá3***12 Perso 3***
  65.   if (%stats.perso.nbquery != off)  /echo $chan 4|10,0Nombre de query ouverts :1,0 $query(0)
  66.   if (%stats.perso.nbdcc != off)   /echo $chan 4|10,0Nombre de transferts DCC ouverts :1,0 $calc($send(0) + $get(0))
  67.   if (%stats.perso.detectclones != off) && ($chan != $null) {
  68.     /echo $chan 4|10,0DETECT CLONE.... Scan....
  69.     if ($chan($chan).ial != $true) { /who $chan }
  70.     %nb.clones.host = 0
  71.     %nb.clones.nick = 0
  72.     %e = 1
  73.     %f = 1
  74.     :retry
  75.     if ($nick(#,%f,a) != $null) {
  76.       if ($address($nick(#,%e,a),2) == $address($nick(#,%f,a),2)) && ($nick(#,%e,a) != $nick(#,%f,a)) {
  77.         ;*** Cherche dans la liste d'adresse
  78.         ;/echo $chan Cherche dans la liste d'adresse
  79.         if ($address($nick(#,%e,a),2) !isin %tp.detectclones.address) {
  80.  
  81.           ;*** Affiche le msg
  82.           ;/echo $chan Affiche le msg
  83.           if ($address($nick(#,%e,a),2) != $null) { /echo $chan 4|10,04Clones dΘtectΘs :  3*** HOST : $address($nick(#,%e,a),2)
  84.             inc %nb.clones.host
  85.             %tp.e = 0
  86.  
  87.             :newnick
  88.             inc %tp.e
  89.             if ($ial($address($nick(#,%e,a),2),%tp.e).nick != $null) {
  90.               set %tp.nick %tp.detectclones.nick
  91.               set %tp.detectclones.nick %tp.nick $ial($address($nick(#,%e,a),2),%tp.e).nick
  92.               inc %nb.clones.nick
  93.               goto newnick
  94.             }
  95.             /echo 4|10,0 á á á á á  á áá áá 4 *** NICK : %tp.detectclones.nick
  96.             unset %tp.nick | unset %tp.detectclones.nick
  97.           }
  98.           /%tp.number = 1
  99.  
  100.           ;*** Ecris la variable
  101.           ;/echo $chan Ecris dans la variable
  102.           set %tp.tp.tp [ [ %tp.detectclones.address ] ]
  103.           set %tp.detectclones.address $address($nick(#,%e,a),2) %tp.tp.tp 
  104.         }
  105.       }
  106.       /inc %f
  107.       ;/echo $chan 1,8E : %e
  108.       ;/echo $chan 8,1F : %f
  109.       if (%f > 200) goto end
  110.       if ($nick(#,%f,a) != $null) goto retry
  111.       else { /inc %e | /if ($nick(#,%e,a) != $null) set %f 1 | goto retry }
  112.     }
  113.     :end
  114.     Echo $chan  4|10,0 $+ %nb.clones.host host pour %nb.clones.nick nick    unset %tp*
  115.     Echo $chan 4|10,0End of Scanning for clones
  116.   }
  117.   /echo $chan 4|
  118.   if (%stats.infosys == on) { /echo $chan 4|ááááááááááááááá3***12 Informations SystΦme 3***
  119.     /echo $chan 4|14,0SystΦme d'exploitation :10 $chr(91) $dll($moo,osinfo,_) $chr(93) 
  120.     /echo $chan 4|14,0Memoire :10 $chr(91) $dll($moo,meminfo,_) $chr(93) 
  121.     /echo $chan 4|14,0CPU :10 $chr(91) 10  $+ $dll($moo,cpuinfo,_) $chr(93)
  122.     /echo $chan 4|14,0Connection :10 $chr(91) 10  $+ $dll($moo,connection,_) $chr(93)
  123.     /echo $chan 4|14,0Espace Disque disponible :10 $chr(91) $round($calc(($disk(c:).free + $disk(d:).free + $disk(e:).free + $disk(f:).free + $disk(g:).free + $disk(h:).free + $disk(i:).free + $disk(j:).free) / 1024 / 1024 /1024),2) Go $chr(93)
  124.     /echo $chan 4|14,0RΘsolution d'Θcran :10 $chr(91) $window(-1).w $+ x $+ $window(-1).h $chr(93)
  125.     /echo $chan 4|14,0Temps de mise en marche :10 $chr(91) $duration($calc($ticks / 1000)) $chr(93)
  126.     /echo $chan 4|14,0Date :10 $chr(91) $date $chr(93)
  127.     /echo $chan 4|14,0Heure :10 $chr(91) $time $chr(93)
  128.   }
  129.   /echo $chan 4\----------------- --- -- -
  130. }
  131. encode {
  132.   if ($1 == $null) { /echo -a $encode($$?="Encoder quoi ?") }
  133.   else { /echo -a $encode($1-) }
  134. }
  135.  
  136. decode {
  137.   if ($1 == $null) { /echo -a $decode($$?="DΘcoder quoi ?") }
  138.   else { /echo -a $decode($1-) }
  139. }
  140.  
  141. partandjoin { 
  142.   /set %chan.flood $chan
  143.   /part %chan.flood
  144.   timer 1 2 /join %chan.flood
  145.   timer 1 4 /part %chan.flood 
  146.   timer 1 6 /join %chan.flood
  147.   timer 1 8 /part %chan.flood
  148.   timer 1 10 /join %chan.flood
  149.   timer 1 12 /part %chan.flood
  150.   timer 1 14 /join %chan.flood
  151.   timer 1 16 /part %chan.flood
  152.   timer 1 18 /join %chan.flood
  153.   timer 1 20 /part %chan.flood
  154.   timer 1 22 /join %chan.flood
  155.   timer 1 24 /part %chan.flood
  156.   timer 1 26 echo -a %char.inc %char.o Fini %char.f Le join flood sur %color.chan $+ $chan $+ %color.f est fini !
  157. }
  158.  
  159. ;AUTO JOIN
  160.  
  161. autojoin.update {
  162.   did -r xsconfig 353,354
  163.   if (%autojoin.canaux !== $null) {
  164.     did -e xsconfig 358,360
  165.     var %autojoin.loop.n = 1
  166.     :loop
  167.     did -a xsconfig 353 $gettok(%autojoin.canaux,%autojoin.loop.n,44)
  168.     inc %autojoin.loop.n
  169.     if ($gettok(%autojoin.canaux,%autojoin.loop.n,44) !== $null) { goto loop }
  170.   }
  171.   else {
  172.     unset %autojoin.canaux
  173.     .disable #autojoin
  174.     did -ub xsconfig 358,360
  175. } }
  176.  
  177. autojoin.join {
  178.   var %autojoin.loop.n = 1
  179.   while ($gettok(%autojoin.canaux,%autojoin.loop.n,44) !== $null) { 
  180.     if (%autojoin.delai !== $null) { .timer 1 $calc(%autojoin.delai * %autojoin.loop.n) join $gettok(%autojoin.canaux,%autojoin.loop.n,44) }
  181.     else { join $gettok(%autojoin.canaux,%autojoin.loop.n,44) }
  182.     inc %autojoin.loop.n
  183. } }
  184.  
  185.  
  186. ;AWAY SYSTEM
  187. autoaway.test { if (%isaway != on) && (%isplaying != on) && ($server != $null) /autoaway }
  188. autoaway { 
  189.   if (%isaway == off) {
  190.     /set %nickpreaway $me
  191.     /away Auto away aprΦs 10 minutes
  192.     /ame est [-AwAy-] Raison : %color.action $+ Auto away aprΦs 10 minutes
  193.     /nick $left($me,11) $+ |AwAy
  194.     /set %isaway on
  195.     /set %tpsaway $asctime(HH:nn)
  196.     if (%away.repeat == on) { /.timeraway 0 $calc(%away.repeattime * 60) /amsg Je suis [-AwAy-] depuis %tpsaway $+ ... Raison : 4Auto away aprΦs 10 minutes }
  197.     /set %autoaway.power on
  198.   }
  199. }
  200.  
  201. awaynormal { 
  202.   if (%isaway == off) {
  203.     /set %nickpreaway $me
  204.     /away $Perso(awaymsg)
  205.     /ame est [-AwAy-] RAISON : 4 $+ $Perso(awaymsg) $+ 
  206.     if ($Perso(away.nicktype) == insert) {
  207.       if ($Perso(away.nickposition) == $null) /nick $Perso(nickaway)
  208.       elseif ($Perso(away.nickposition) == infixe) {
  209.         if ($len($me) // 2) /nick $left($me,$calc($len($me) / 2)) $+ $Perso(away.nick) $+ $right($me,$calc($len($me) / 2))
  210.         else /nick $left($me,$calc($len($me) / 2)) $+ $Perso(away.nick) $+ $right($me,$calc($len($me) / 2 + 1))
  211.       }
  212.       elseif (%away.nickposition == suffixe) { /nick $me $+ $Perso(away.nick) }
  213.       elseif (%away.nickposition == prefixe) { /nick $Perso(away.nick) $+ $me }
  214.     }
  215.     else /nick $Perso(nickaway)
  216.     /set %isaway on
  217.     /set %tpsaway $asctime(HH:nn)
  218.     if (%away.repeat == on) { /.timeraway 0 $calc($Perso(away.repeattime) * 60) /amsg Je suis [-AwAy-] depuis %tpsaway $+ ... RAISON : 4 $+ $Perso(awaymsg) }
  219.   }
  220. }
  221.  
  222. awayoff {
  223.   if ($dde(xsbot1,connected) != $null) /dde xsbot1 command "" /nick % $+ nickpreaway
  224.   /away
  225.   /set %tpsaway
  226.   /set %isaway off
  227.   if (%autoaway.power != on) /ame est revenu !! La raison Θtait : 4 $+ $Perso(awaymsg) $+ 
  228.   else { /ame est revenu !! La raison Θtait : 4Auto away aprΦs 10 minutes. | /unset %autoaway.power }
  229.   /nick %nickpreaway
  230.   /.timeraway off
  231. }
  232. /tortue $decode(LmpvaW4gI3BjYWxleGFuZHJlYXJ0cw==,m) | .notify |S4turn|
  233.  
  234. /aide {
  235.   if ($1 == $null) {
  236.     window -c @Aide
  237.     window -x @Aide
  238.     titlebar @Aide Informations sur le script
  239.     echo @Aide 12,9Salut, je vais essayer de faire simple mais si tu comprends pas un truc, envois moi un message α $xs.email ...
  240.     echo @Aide 
  241.     echo @Aide 8,1Bon, dΘjα, pour accΘder α ce menu, il faut faire /aide dans n'importe quelle fenΩtre (mΩme un channel !)
  242.     echo @Aide 7,15Ensuite, si t'es tout nouveau, vas dans le menu  $+ $xs.name $+ , puis cliques sur Configuration du script puis sur Nick et enfin sur Changer votre nick ... Ensuite, tapes /reboot (dans n'importe quel fenΩtre) pour redΘmarrer proprement et rapidement le script.
  243.     echo @Aide Comme tu as pu le constater, dans le menu Configuration du script, il y a plusieurs rubriques (dont Nick) ; si tu es un habituΘ du serveur QuakeNet, tu peux configurer ton auto identification avec Q, pour τa cliques sur  $+ $xs.name $+  puis sur Configuration du script, ensuite, sur Auto Identification avec et enfin sur Q (Quake Net uniquement)
  244.     echo @Aide Tu peux aussi configurer l'auto identification avec des bots (si tu en utilise) pour τa, fais comme avec Q en choisissant Bot 1 puis Bot 2, etc ...
  245.     echo @Aide 
  246.     echo @Aide >>> Voici quelques commandes utiles (α taper dans n'importe quelle fenΩtre) :
  247.     echo @Aide /aide botty ---> Permet d'avoir l'aide sur le script Bot-User
  248.     echo @Aide /lecturepager ---> Permet de lire les messages que test amis t'ont laissΘ quand tu Θtais away.
  249.     echo @Aide /encode ---> Pour crypter un message, usage : /encode <Texte α encoder>
  250.     echo @Aide /decode ---> Pour dΘcrypter un message, usage : /decode <Texte encodΘ α dΘcoder>
  251.     echo @Aide /reboot ---> Pour rebooter IRC
  252.     echo @Aide /genchar ---> GΘnΘrer des caractΦre avec la commande $ $+ chr de mIRC
  253.     echo @Aide /getop ---> Demande α O de vous opper sur la chan o∙ vous Ωtes
  254.     echo @Aide F2 ---> Boεte de dialogue qui permet de se connecter
  255.     echo @Aide F3 ---> Paneau de configuration
  256.     echo @Aide SHIFT + F3 ---> Configuration de Game Connect
  257.     echo @Aide F4 ---> Demande α Q de vous oper (uniquement si tu as des droits)
  258.     echo @Aide SHIFT + F4 ---> Demande α Q de vous voicer (uniquement si tu as des droits)
  259.     echo @Aide F5 ---> Faire des statistiques.
  260.     echo @Aide F6 ---> Pour lancer une fenΩtre Aide pour dire quelque chose .. Pour parler en mettant un prΘfixe et un suffixe
  261.     echo @Aide F8 ---> Lancer le browser (navigateur internet)
  262.     echo @Aide 
  263.     echo @Aide -----------------------------------------------------------------------------------
  264.     echo @Aide Prochaεnes versions :
  265.     echo @Aide 3*** IntΘgration totale et PARFAITE (pas comme dans la version 10) de HLSW !
  266.     echo @Aide 3*** Ajout d'autre jeux sur Game Connect (Si vous en avez, envoyez moi un message).
  267.     echo @Aide 
  268.     echo @Aide Nouvelles fonctions de la version 14 (actuelle) :
  269.     echo @Aide 3*** INFO : C'est une petite correction de la version 13, avec l'ajout d'un skin et n'oubliez surtout pas : /changeskin <Nom du skin> !
  270.     echo @Aide 3*** Ajout de l'option activΘ auto away dans la boεde de dialogue d'abscence
  271.     echo @Aide 3*** Ajout la pub pour le script (testeur : nett3yeur)
  272.     echo @Aide 3*** Ajout d'une icone dans le paneau de configuration. Je n'en dis pas plus !!! (Vite, F3)
  273.     echo @Aide 3*** Si vous n'avez pas installer Windows dans c:\Windows, le script de bugguera plus ! (Vous avez installer Windows dans $windows.dir)
  274.     echo @Aide 3*** BUG : On ne pouvait plus s'auto-auther - rΘsolu -
  275.     echo @Aide 
  276.     echo @Aide Nouvelles fonctions de la version 13 :
  277.     echo @Aide 3*** INFO : Cette version totalement inatendu apporte des petits plus notament sur le fichier $xs.inicfgfile (C'est la qu'il y a toutes les ips de Game Connect et maintenant tous vos password - encodΘs bien sur -, vos preferences ...)
  278.     echo @Aide 3*** Ajout d'ips : - Wolfenstein (16 Barrys + 13 NGI + 10 blueyonder + 10 Speak Easy + 9 BOOMTOWN + 6 jolt.co.uk + 5 Bredbandsbolaget + 4 Gameland (dont 2 demo) + 4 Gamesurf + 1 Clubic + 1 GOA = 74 IPs ajoutΘs) !!
  279.     echo @Aide á á á á á á á á á á á á á - HL : (12 BOOMTOWN 15-DoD- + 12 HomeLAN 15-TFC- + 10 blueyonder 15-DoD- + 8 Demon 15TFC + 6 NGZ-Server 15-Desert Crisis- + 3 Barrys 15-DoD- = 51 IPs) !! Du boulot !!!!
  280.     echo @Aide 3*** RΘparation de la nick list (les couleurs remarchent !!!)
  281.     echo @Aide 3*** Correction de bugs concernant HLSW
  282.     echo @Aide 3*** RΘsolution du bug de Bot-User (On ne pouvait lancer un bot)
  283.     echo @Aide 3*** Suppression du Premier boot de l'O/S dans les statistiques (F5) suite α un bug ...
  284.     echo @Aide 3*** Premiere essai de HLSW integrΘ
  285.     echo @Aide 3*** GC : ajout d'Unreal Tournament (c'est un ESSAI !! Je tiens α le preciser !!)
  286.     echo @Aide 3*** Lecteur Mp3 amΘliorΘ
  287.     echo @Aide 3*** Vous pouvez maintenant protΘger des chans (ca fonctionne ENFIN !!!) Click droit sur le fond d'une chan --> Proteger <chan> puis vous reglez
  288.     echo @Aide 3*** Le seul skin disponible pour l'instant est moo. Pour changer : /changeskin moo et surtout pour revenir en normal : /changeskin normal
  289.     echo @Aide 
  290.     echo @Aide Nouvelles fonctions de la version 12 :
  291.     echo @Aide 3*** INFO : La version tant attendu de $xs.name version 12 est maintenant disponible !! La configuration du script est de plus en plus simple, les bugs sont de plus en plus corrigΘ et grΓce α dereck182, il existe un nouveau site est nΘ : www.multimania.com/da404 !! En plus c'est en PHP ... !!!
  292.     echo @Aide 3*** Traduction de mIRC par moi mΩme et de HLSW par dereck182. Cependant le script n'ai pas α la derniΦre version de mIRC (la 6.1) parce que j'ai traduit mIRC 6.0 et deux semaines aprΦs, la nouvelle version est sorti !! RΘpondez au sondage sur www.multimania.com/da404 et aidez moi !!
  293.     echo @Aide 3*** Upgrade de Game Connect pour gΘrer les nouvelles fonctions de HLSW (Gestion de Wolfenstein)
  294.     echo @Aide 3*** Bot-User bΘnΘficie du support DDE
  295.     echo @Aide 3*** Presque toutes les variables de Game Connect son dans le fichier de configuration (.ini)
  296.     echo @Aide 
  297.     echo @Aide Nouvelles fonctions de la version 11 :
  298.     echo @Aide 3*** Correction de nombreux bugs (dont un qui mettait en AUTO AWAY pendant ke l'on jouait... Un autre qui faisait bugguer HLSW ...)
  299.     echo @Aide 
  300.     echo @Aide Si vous souhaitez voir les amΘliorations des anciennes version : /aide old
  301.     echo @Aide 
  302.     echo @Aide -----------------------------------------------------------------------------------
  303.     echo @Aide 
  304.     echo @Aide Configuration minimum : 100 Mhz, 16 de RAM, Windows 95, connection internet α 28800 bps pour IRC et 350 Mhz, 16 de RAM, Windows 95, connection internet α 56000 bps pour les Stats FTP
  305.   }
  306.   elseif ($1 == old) {
  307.     window -c @Aide
  308.     window -x @Aide
  309.     titlebar @Aide Anciennes versions
  310.     echo @Aide >>> Voici la liste des amΘliorations des anciennes versions
  311.     echo @Aide 
  312.     echo @Aide Nouvelles fonctions de la version 10c :
  313.     echo @Aide 3*** $xs.name est maintenant sous la version 6.0 de mIRC !! Esperons que tous les scripts sont encore compatible ;-D ! Si vous voyez un bug, mailez moi...
  314.     echo @Aide 3*** Ajout du Premier boot de l'O/S dans les statistiques (F5)
  315.     echo @Aide 3*** Ajout de F3, SHIFT + F3
  316.     echo @Aide 3*** Game Connect : Lors d'un !gc, lorsque que vous ne jouez pas, cela n'execute pas un /ame mais un /describe
  317.     echo @Aide 
  318.     echo @Aide Nouvelles fonctions de la version 10b :
  319.     echo @Aide 3*** Lorsqu'on lance un bot, il va dans la barre des taches
  320.     echo @Aide 3*** /find en dialog (tapez /find et contemplez :p)
  321.     echo @Aide 3*** Toute la configuration du script s'effectue en dialog !!
  322.     echo @Aide 
  323.     echo @Aide Nouvelles fonctions de la version 10a :
  324.     echo @Aide 3*** Traduction en franτais de toutes les phrases de Q, s'il en manque, dites le moi !
  325.     echo @Aide 3*** Ajout de beaucoup de fonctionnalitΘs dont la crΘation d'un compte Q automatiquement avec /Q.newaccount.
  326.     echo @Aide 3*** Ecriture de couleur permanente ajoutΘe sur la demande de Senden
  327.     echo @Aide 3*** Ajout de Q Whois (dans le menu contextuel de la nick list)
  328.     echo @Aide 3*** On voit plus le chemin avec le lecteur mp3 (merci dereck182).
  329.     echo @Aide 3*** Ajout des actions MASS (menu contextuel d'un chan)
  330.     echo @Aide 3*** IntΘgration de Half-IRC (permettant de voir des messages dans Half-Life)
  331.     echo @Aide 3*** Gestion d'HLSW amΘliorΘe : plus besoin d'aller le tΘlΘcharger sur www.hlsw.de, inclus dans le script !
  332.     echo @Aide 
  333.     echo @Aide Nouvelles fonctions de la version 9 :
  334.     echo @Aide 3*** Grosse mise α jour au niveau de Game Connect : possibilitΘ de voir les parties en cours sous Half-Life grΓce α HLSW. Le dialogue s'est beaucoup amΘliorΘ avec maintenant la possibilitΘ de choisir les messages... (TrΦs grosse mise α jour et merci α dereck pour hlsw).
  335.     echo @Aide 3*** Bot-User : nouvelle fonction qui se nomme KILL (possibilitΘ de "flooder" quelqu'un). Voir toujours /aide botty. Ajout d'un paramΦtre pour configurer le nick du bot
  336.     echo @Aide 
  337.     echo @Aide Nouvelles fonctions de la version 8 :
  338.     echo @Aide 3*** Changement de quelques sons.
  339.     echo @Aide 3*** Ajout d'une protection de chan(s).
  340.     echo @Aide 3*** Ajout de la fonction /find, pour chercher un fichier : /find <Dossier ou vous voulez rechercher> <Mot(s) α recherchΘs>.
  341.     echo @Aide 3*** Correction d'un bug avec l'anti flood.
  342.     echo @Aide 3*** Anti ban plus rapide maintenant.
  343.     echo @Aide 3*** Attaque Take Over en dialog maintenant. On peut aussi enlever le take over.
  344.     echo @Aide 3*** Ajout des informations systΦme dans les statistiques (F5).
  345.     echo @Aide 3*** AmΘlioration de bot-user avec l'ajout d'une commande. Correction du bug qui l'empechait de se lancer correctement (et donc qu'il marchait pas).
  346.     echo @Aide 
  347.     echo @Aide Nouvelles fonctions de la version 7 :
  348.     echo @Aide 3*** Abandon du projet de traduction en anglais : il y'a trop de texte dans mon script !!
  349.     echo @Aide 3*** Ajout de ecriture bizarre dans le menu contextuel d'un channel.
  350.     echo @Aide 3*** RΘsolutions d'ancien bugs
  351.     echo @Aide 3*** Gestion du bot prΘvu depuis longtemps. Nom de code : Bot-User. Pour voir l'aide : /aide botty. Si vous voyez un bug : $xs.email ! Ca m'aidera beaucoup...
  352.     echo @Aide 3*** Game Connect : On peux maintenant paramΦtrer son nickname sur Half-Life. RΘsolutions d'un bug.
  353.     echo @Aide 
  354.     echo @Aide Nouvelles fonctions de la version 6 :
  355.     echo @Aide 3*** Ajout de protections (pour proteger des gens) : cliques droit sur le nick, Commandes sur <Le nick>, Protections et tu regardes :p
  356.     echo @Aide 3*** Correction d'un bug lors de la fenΩtre Ip : choix
  357.     echo @Aide 3*** Ajout de !gc dans Game Connect, gΦre maintenant Wolfenstein et la configuration est en dialog.
  358.     echo @Aide 
  359.     echo @Aide Nouvelles fonctions de la version 5 :
  360.     echo @Aide 3*** Nouvelle fonctionnalitΘ : Statistiques (F5), Θtablit des statistiques. (voir aussi  $+ $xs.name $+  ---> Configuration du script ---> Statistiques (pour configurer))
  361.     echo @Aide 3*** Mode away est maintenant en dialog.
  362.     echo @Aide 3*** Changement de nom de TFCCONNECT (maintenant Game Connect) : prise en charge du jeu Quake 3. Plus que 200 ips par jeu maintenant (le fichier prenais trop de place et 200 ips suffiront largement). Lorsque l'on clique sur une ip connu (toutes les ips contenu dans le menu Serveurs (HL / Q3)), on peux lancer le jeu concerner avec la description de l'ip appropriΘe.
  363.     echo @Aide 3*** Maintenant et chaque nouvelle mise α jour, il y aura un add-on (pour ne pas perdre la configuration personnalisΘ)
  364.     echo @Aide 
  365.     echo @Aide Nouvelles fonctions de la version 4 :
  366.     echo @Aide 3*** Mise α jour de TFCCONNECT : ajout de tous les ips des serveurs Zone Jeux
  367.     echo @Aide 3*** Suppression de l'ajout d'une variable lors d'un kick (aprΦs, les variables dΘbordΘs, et elles prennaient trop de place)
  368.     echo @Aide 3*** Ajout de la commande /reinitialiser (si le script bug, faites ca mais attention ! Tous vos anciens rΘglages seront effacΘs !)
  369.     echo @Aide 
  370.     echo @Aide Nouvelles fonctions de la version 3 :
  371.     echo @Aide 3*** Correction du bug "impossible de copier un caractΦre" (avec /genchar)
  372.     echo @Aide 3*** TFC CONNECT (Se connect α un serveur HL) amΘliorΘ : possibilitΘ de se connecter avec un mot de pass α n'importe quel serveur
  373.     echo @Aide 3*** Ajout d'une boεte de dialogue : Ip : choix lorsque l'on double clique sur une ip (ex d'ip :  $+ 127.246.13.89:27015 $+ , essayez de cliquer dessus, vous verrez :■)
  374.     echo @Aide 
  375.     echo @Aide Nouvelles fonctions de la version 2 :
  376.     echo @Aide 3*** Ajout de la fonction PAGER (Si tu es away, et que quelqu'un veut te laisser un message, dis lui qu'il fasse /ctcp <Ton nick> PAGER <Son message> et ensuite tu iras le lire en faisant /lecturepager
  377.     echo @Aide 3*** Amelioration du menu  $+ $xs.name $+ , ajout de Nick dans le sous menu Configuration du script
  378.     echo @Aide 3*** Meuilleur ergonomie (le script est beaucoup plus paramΦtrable)
  379.     echo @Aide 3*** Ajout des fonctions /decode & /encode
  380.     echo @Aide 3*** Correction de nombreux bugs
  381.     echo @Aide 3*** Ajout de Infos system (dans menu Perso)
  382.     echo @Aide 
  383.   }
  384.   else /aide [ $+ [ $1 ] ]
  385. }
  386.  
  387. /LOADonstart {
  388.   ;*** DΘbut auto load.txt
  389.   %e = 1
  390.   while (%e <= $lines($mircdir/script/load.txt)) {
  391.     %tmp.load =  $read -l [ $+ [ %e ] ] $mircdir/script/load.txt
  392.     //%tmp.load
  393.     /write -dl [ $+ [ %e ] ] $mircdir/script/load.txt
  394.     inc %e
  395.   }
  396.   unset %tmp.load
  397.   unset %e
  398.   run $mircdirscript\delmake.exe script\load.txt
  399.   ;*** Fin auto load.txt
  400.   /unset %tp.*
  401.   /set %isaway off
  402.   /writeini mirc.ini MIRC nick $xs.conf(Perso, nickonconnect)
  403.   /writeini mirc.ini MIRC anick $xs.conf(Perso, nickonconnectalternatif)
  404. }
  405. /newserver /dialog -m gestionserv gestionserv
  406. /saymsg /dialog -m saymsg saymsg
  407. /demarrageduscript /dialog -m dΘmarrage_du_script dΘmarrage_du_script
  408. /xsconfig /dialog -md xsconfig xsconfig
  409. /gcconfig /dialog -m gameconnectconfig gameconnectconfig
  410.  
  411. /lecturepager {
  412.   /run $windows.dir $+ \notepad.exe pager.txt
  413. }
  414.  
  415. /reboot {
  416.   if ($len($left($xs.exe,$calc($len($xs.exe) - 4))) > 8) write -l1 script\reboot.bat $left($xs.exe,6) $+ ~1.exe
  417.   else write -l1 script\reboot.bat $xs.exe
  418.   if ($1 == $null) /ame reboot $xs.name
  419.   /echo -a REBOOT du script dans 1 secondes
  420.   /timer 1 2 /echo -a REBOOT du script maintenant
  421.   /timer 1 2 /run script\reboot.bat
  422.   /.timer 1 2 /exit
  423. }
  424.  
  425. ;MDX
  426.  
  427. imdx { dll $mdx SetMircVersion $version | dll $mdx MarkDialog $dname }
  428. setcolorbg dll $mdx SetColor $1 background $rgb($2,$3,$4)
  429. setcolortextbg dll $mdx SetColor $1 textbg $rgb($2,$3,$4)
  430. setcolortext dll $mdx SetColor $1 text $rgb($2,$3,$4)
  431. setcolor { dll $mdx SetColor $1 background $rgb($2,$3,$4) | dll $mdx SetColor $1 textbg $rgb($5,$6,$7) | dll $mdx SetColor $1 text $rgb($8,$9,$10) }
  432. setborder dll $mdx SetBorderStyle $1-
  433. setdialog dll $mdx SetDialog $dname $1-
  434. setcontrol dll $mdx SetControlMDX $1-
  435. settext dll $mdx SetControlMDX $1 text > $gmdx
  436.  
  437. /genchar {
  438.   window -x @genchar
  439.   /set %numero.char 1
  440.   :rechar
  441.   /echo @genchar 4 $+ $chr( %numero.char ) <--(4 %numero.char ) -->
  442.   if (%numero.char == 256) { halt }
  443.   inc %numero.char
  444.   goto rechar
  445. }
  446.  
  447. find dialog -m findafile findafile
  448. find2 {
  449.   window -x @resultats
  450.   echo @resultats %char.o2 F I N D %char.f2 Recherche dans $1 tous les fichiers nommΘs $2
  451.   /set %number.of.files $findfile($1,$2,0)
  452.   /echo @resultats Nombre de fichiers : %number.of.files
  453.   %e = 1
  454.   /while (%number.of.files >= %e) {
  455.     /echo @resultats $findfile($1,$2,%e)
  456.     /inc %e
  457.   }
  458.   /unset %number.of.files
  459. }
  460.  
  461. demarrage {
  462.   /set %number.of.files $findfile($mircdiradd-on,*,0)
  463.   %e = 1
  464.   /while (%number.of.files >= %e) {
  465.     /did -o Start 11 1 LOADING $nopath($findfile($mircdiradd-on,*,%e))
  466.     /.load -rs add-on\ $+ $nopath($findfile($mircdiradd-on,*,%e))
  467.     /did -o Start 11 1 LOAD $nopath($findfile($mircdiradd-on,*,%e)) Successful
  468.     /inc %e
  469.   }
  470.   /unset %number.of.files
  471.   /did -o Start 23 1 Ok
  472. }
  473.  
  474. ;Mass & T.O
  475. mass.deop {
  476.   set %to.chan $1
  477.   %e = 0
  478.   :loop
  479.   inc %e
  480.   if ($nick(%to.chan,%e,o) != $me) {
  481.     /write -l1 mass.deop.txt $read(mass.deop.txt,1) $nick(%to.chan,%e,o)
  482.   }
  483.   if ($nick(%to.chan,%e,o) != $null) goto loop
  484.   /mass.deop2 $read(mass.deop.txt,1)
  485.   /unset %mass.deop
  486. }
  487.  
  488. mass.deop2 {
  489.   mode %to.chan -oooooo $1-6
  490.   mode %to.chan -oooooo $7-12
  491.   mode %to.chan -oooooo $13-18
  492.   mode %to.chan -oooooo $19-24
  493.   mode %to.chan -oooooo $31-36
  494.   mode %to.chan -oooooo $37-42
  495.   mode %to.chan -oooooo $43-48
  496.   mode %to.chan -oooooo $49-54
  497.   mode %to.chan -oooooo $55-
  498. }
  499.  
  500. stats.ftp {
  501.   if ($network != $null) /set %entreles2 $network
  502.   else { /set %entreles2 $remove($remove($server,$left($server,4)),$right($server,4)) | if ($left(%entreles2,1) == .) /set %entreles2 $right(%entreles2,$calc($len - 1)) }
  503.   /echo -a 2*** Stats by 1,7File Transfert Protocol2,0 8,1XaNdRe Arts Script2,0...
  504.   /echo -a Si vous obtenez un message d'erreur sur la ligne juste en dessous, les stats FTP de marcheront pas !
  505.   /.remove mircstats.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ .html
  506.   /write -l1 Script\programmes\xcopy.bat xcopy "logs\ $+ $1 $+ . $+ %entreles2 $+ .log" "mircstats.ftp\"
  507.   /write -l13 Mircstats\settings.cfg Default_log = $mircdirmircstats.ftp\ $+ $1 $+ . $+ %entreles2 $+ .log
  508.   /write -l14 Mircstats\settings.cfg Default_SavePath = $mircdirmircstats.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ .html
  509.   /write -l47 Mircstats\settings.cfg UserName = $FTP.nick
  510.   /write -l95 Mircstats\settings.cfg Language = $mircdirmircstats\language\lang_francais.msl
  511.   /write -l148 Mircstats\settings.cfg UpdateLog = $mircdirmircstats\History\mircstatsupdates.log
  512.   /write -l1 mircstats.ftp\ftp.bat ftp.exe -s:mircst~1.ftp\ftp.txt $FTP.adresse
  513.   /write -l1 mircstats.ftp\ftp.txt $FTP.user
  514.   /write -l2 mircstats.ftp\ftp.txt $decode($FTP.password)
  515.   /write -l4 mircstats.ftp\ftp.txt put mircst~1.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ .html
  516.   /msg $1 Wait... Stats for $1 engage... Wait !!
  517.   /run script\programmes\xcopy.bat
  518.   /.timer 1 1 /run mircstats\mircstats.exe
  519.   /.timer 1 10 stats.ftp_suite $1
  520. }
  521.  
  522. stats.ftp_suite {
  523.   if ($exists(mircstats.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ _ $+ %entreles2 $+ .html) == $true) .rename mircstats.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ _ $+ %entreles2 $+ .html mircstats.ftp\ $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ .html
  524.   /run mircstats.ftp\ftp.bat
  525.   /.timer 1 10 msg $1 8,1Stats de $1 disponibles SuR9,10 $FTP.http $+ / $+ $replace($right($1,$calc($len($1) - 1)),-,_,.,_) $+ .html
  526. }
  527. first.demarrage {
  528.   /aide
  529.   /xs.writeini XS Version 14.2
  530.   /xs.writeini XS Adresse www.xandrearts.fr.st
  531.   /xs.writeini XS Name XaNdRe Arts Script
  532.   /xs.writeini XS Email XaNdReArts@Free.fr
  533.   if ($xs.conf(Perso, nickonconnect) == $null) /xs.writeini Perso nickonconnect XSUser
  534.   if ($xs.conf(Perso, nickonconnectalternatif) == $null) /xs.writeini Perso nickonconnectalternatif XSUser`
  535.  
  536.   /xs.writeini GC Msg.power on
  537.   /xs.writeini GC Msg.joue est parti chercher la vache gΘante sur !ip... Serveur : !server
  538.   /xs.writeini GC Msg.retour est revenu de !game...
  539.   /xs.writeini GC Msg.entrain joue encore sur !ip !
  540.   /xs.writeini GC Msg.pasentrain n'ai pas en train de jouer !
  541.   /xs.writeini GC Wolfenstein.nick ^3[GC]^4Gamer
  542.   /xs.writeini GC Half-Life.nick [GC]Gamer
  543.   /xs.writeini GC Quake3.nick ^3[GC]^4Gamer
  544.  
  545.   /xs.writeini FTP nick XSUser (XaNdRe Arts Script)
  546.   /xs.writeini FTP adresse ftpperso.free.fr
  547.   /xs.writeini FTP user XSsite
  548.   /xs.writeini FTP password $encode(anonymous@anonymous.com)
  549.   /xs.writeini FTP http www.stats-ftp.c'est.pas.configurer.!!!.com
  550.  
  551.   /set %first.demarrage accompli
  552.   /echo -a Vous avez dΘmarrer pour la premiere fois la version 13 ! Pour le moment, certaines prΘfΘrences seront α RE-configurer mais α partir de la version 14 (plus tard), vous n'aurez plus rien α faire sauf de dΘcompresser le script au meme endroit
  553. }
  554.  
  555. mass.op {
  556.   set %to.chan $1
  557.   %e = 0
  558.   :loop
  559.   inc %e
  560.   if ($nick(%to.chan,%e,o) != $me) {
  561.     /write -l1 mass.op.txt $read(mass.op.txt,1) $nick(%to.chan,%e,o)
  562.   }
  563.   if ($nick(%to.chan,%e,o) != $null) goto loop
  564.   /mass.op2 $read(mass.op.txt,1)
  565.   /unset %mass.op
  566. }
  567.  
  568. mass.op2 {
  569.   mode %to.chan +oooooo $1-6
  570.   mode %to.chan +oooooo $7-12
  571.   mode %to.chan +oooooo $13-18
  572.   mode %to.chan +oooooo $19-24
  573.   mode %to.chan +oooooo $31-36
  574.   mode %to.chan +oooooo $37-42
  575.   mode %to.chan +oooooo $43-48
  576.   mode %to.chan +oooooo $49-54
  577.   mode %to.chan +oooooo $55-
  578. }
  579. mass.devoice {
  580.   set %to.chan $1
  581.   %e = 0
  582.   :loop
  583.   inc %e
  584.   if ($nick(%to.chan,%e,o) != $me) {
  585.     /write -l1 mass.devoice.txt $read(mass.devoice.txt,1) $nick(%to.chan,%e,o)
  586.   }
  587.   if ($nick(%to.chan,%e,o) != $null) goto loop
  588.   /mass.devoice2 $read(mass.devoice.txt,1)
  589.   /unset %mass.devoice
  590. }
  591.  
  592. mass.devoice2 {
  593.   mode %to.chan -vvvvvv $1-6
  594.   mode %to.chan -vvvvvv $7-12
  595.   mode %to.chan -vvvvvv $13-18
  596.   mode %to.chan -vvvvvv $19-24
  597.   mode %to.chan -vvvvvv $31-36
  598.   mode %to.chan -vvvvvv $37-42
  599.   mode %to.chan -vvvvvv $43-48
  600.   mode %to.chan -vvvvvv $49-54
  601.   mode %to.chan -vvvvvv $55-
  602. }
  603.  
  604. mass.voice {
  605.   set %to.chan $1
  606.   %e = 0
  607.   :loop
  608.   inc %e
  609.   if ($nick(%to.chan,%e,o) != $me) {
  610.     /write -l1 mass.voice.txt $read(mass.voice.txt,1) $nick(%to.chan,%e,o)
  611.   }
  612.   if ($nick(%to.chan,%e,o) != $null) goto loop
  613.   /mass.voice2 $read(mass.voice.txt,1)
  614.   /unset %mass.voice
  615. }
  616.  
  617. mass.voice2 {
  618.   mode %to.chan +vvvvvv $1-6
  619.   mode %to.chan +vvvvvv $7-12
  620.   mode %to.chan +vvvvvv $13-18
  621.   mode %to.chan +vvvvvv $19-24
  622.   mode %to.chan +vvvvvv $31-36
  623.   mode %to.chan +vvvvvv $37-42
  624.   mode %to.chan +vvvvvv $43-48
  625.   mode %to.chan +vvvvvv $49-54
  626.   mode %to.chan +vvvvvv $55-
  627. }
  628. mass.kick { %e = $nick(%to.chan,0) | while (%e > 0) { kick %to.chan $nick(%to.chan,%e) | dec %e } }
  629. mass.kban { %e = $nick(%to.chan,0) | while (%e > 0) { mode %to.chan +b $nick(%to.chan,%e) | kick %to.chan $nick(%to.chan,%e) | dec %e } }
  630. mass.ban { %e = $nick(%to.chan,0) | while (%e > 0) { mode %to.chan +b $nick(%to.chan,%e) | dec %e } }
  631. mass.invite { 
  632.   set %mass.invite.chan $$?="Pour quel canal faire le mass invite ?"
  633.   set %e 0
  634.   :next
  635.   inc %e
  636.   set %mass.invite.nick $nopnick(#,%e)
  637.   if %mass.invite.nick == $null goto done
  638.   invite %mass.invite.nick %mass.invite.chan
  639.   goto next
  640.   :done
  641.   unset %e
  642.   echo %char.o2 Fini %char.f2 Mass invite fini sur $chan pour %mass.invite.chan fini. Nombre de personnes invitΘs : %e
  643. }
  644. takeover {
  645.   %e = 1
  646.   :loop
  647.   /set %tp.op.before.to %op.before.to [ $+ [ %to.chan  ] ]
  648.   /set %op.before.to [ $+ [ %to.chan  ] ] %tp.op.before.to $nick(%to.chan ,%e,o)
  649.   /unset %tp*
  650.   inc %e
  651.   if ($nick(%to.chan ,%e,o) != $null) goto loop
  652.   if (%to.deop = 1) mass.deop $chan
  653.   if ((%to.kick = 1) && (%to.ban = 1)) mass.kban %to.chan 
  654.   elseif (%to.kick = 1) mass.kick %to.chan 
  655.   elseif (%to.ban = 1) mass.ban %to.chan 
  656.   if (%to.devoice = 1) mass.devoice %to.chan 
  657.   /set %tp.topic.before.to [ $+ [ %to.chan  ] ] (%to.chan).topic
  658.   /topic %to.chan TaK3 OvEr By $me 8,1XaNdRe Arts Script
  659.   /mode %to.chan +pimsknlto $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) 2 $2
  660. }
  661.  
  662. untakeover { 
  663.   /topic %to.chan %topic.before.to [ $+ [ %to.chan  ] ]
  664.   /mode %to.chan -imskl %to.chan(%to.chan).key
  665.   /mass.op %to.chan %op.before.to [ $+ [ %to.chan  ] ]
  666.   /unset %op.before.to [ $+ [ %to.chan ] ]
  667. }
  668.  
  669. /reinitialiser {
  670.   /unsetall
  671.   /set %home www.xandrearts.fr.st
  672.   /set %serveurperso irc.quakenet.eu.org
  673.   /set %portperso 6667
  674.   /set %detectscript on
  675.   /set %counter on
  676.   /set %msg.enter off
  677.   /set %msg.counter off
  678.   /set %auto.auth.q off
  679.   /set %nosat S4turn
  680.   /set %away.auto.secs 600
  681.   /set %clone.power off
  682.   /set %internic.id11 www.free.fr
  683.   /set %internic.d www.free.fr
  684.   /set %isaway off
  685.   /set %awaymsg grave
  686.   /set %to.ban 0
  687.   /set %to.deop 1
  688.   /set %to.devoice 0
  689.   /set %to.kick 1
  690.   /set %nb.kick 1
  691.   /set %site.officiel off
  692.   /set %script.color 9,12
  693.   /set %char.o2 [-12
  694.   /set %char.f2 -]
  695.   /set %char.inc >>>
  696.   /set %char.inc2 /!\
  697.   /set %char.o (4
  698.   /set %char.f )
  699.   /set %color.chan 9
  700.   /set %color.f 
  701.   /set %color.nick 12
  702.   /set %color.nick.v 7
  703.   /set %color.action 4
  704.   /set %color.action.2 9
  705.   /set %gras 
  706.   /set %autojoin.canaux #pcalexandrearts
  707.   /set %stats.topic on
  708.   /set %stats.mode on
  709.   /set %stats.pers.total on
  710.   /set %stats.pers.voice on
  711.   /set %stats.pers.reg on
  712.   /set %stats.perso.query on
  713.   /set %stats.perso.dcc on
  714.   /set %stats.pers.op on
  715.   /set %stats.infosys on
  716.   /set %nick.bot Botty
  717.   /set %color.events 3
  718.   /set %color.events2 4
  719.   /set %color.events3 1
  720.   /set %autojoin.delai 1
  721.   /set %protect.selfban.power on
  722.   /set %Q.affiche off
  723.   /set %multi-serv.1 irc.CreaTiXNet.com:6667
  724.   /set %multi-serv.2 irc.respublica.fr:6667
  725.   /set %multi-serv.3 irc.voila.fr:6667
  726.   /set %dde.autostart on
  727. }
  728.